'**********************************************************************
'  Visual Basic Transformation Script
'  Copy each source column to the
'  destination column
'************************************************************************

Function Main()
	if IsNull(DTSSource("Region")) then
		DTSDestination("Region")="Other"
	else
		DTSDestination("Region") = DTSSource("Region")
	end if
	Main = DTSTransformStat_OK
End Function